  setdisplay(400,200,32,1):paper(8^8-1):ink(0):pen(0):cls:mousehide
  prints("pressing any key will create a document named print#.txt, write something there, and close this example")
  waitkey
  open"print#.txt" for output as #1
  print#1,"Hello, World!!!"
  close#1
